home *** CD-ROM | disk | FTP | other *** search
/ The Atari Compendium / The Atari Compendium (Toad Computers) (1994).iso / files / prgtools / gnustuff / tos / bison / bison1~3.zoo / atari.diffs next >
Encoding:
Text File  |  1992-10-01  |  7.8 KB  |  293 lines
  1. *** bison.simple.orig    Wed Sep 30 15:33:59 1992
  2. --- bison.simple    Wed Sep 30 15:34:29 1992
  3. ***************
  4. *** 38,43 ****
  5. --- 38,50 ----
  6.   #endif /* not GNU C.  */
  7.   #endif /* alloca not defined.  */
  8.   
  9. + #ifdef atarist
  10. + #include <stdlib.h>
  11. + #include <string.h>
  12. + #include <unistd.h>
  13. + #include <memory.h>
  14. + #endif /* atarist */
  15. + 
  16.   /* This is the parser code that is written into each bison parser
  17.     when the %semantic_parser declaration is not specified in the grammar.
  18.     It was written by Richard Stallman by simplifying the hairy parser
  19. *** files.c.orig    Wed Sep 30 15:34:00 1992
  20. --- files.c    Wed Sep 30 15:35:20 1992
  21. ***************
  22. *** 69,74 ****
  23. --- 69,77 ----
  24.   extern int verboseflag;
  25.   extern int definesflag;
  26.   int fixed_outfiles = 0;
  27. + #ifdef atarist
  28. + long _stksize = -1L;
  29. + #endif
  30.   
  31.   
  32.   char*
  33. ***************
  34. *** 116,127 ****
  35.   #endif
  36.     int tmp_len;
  37.   
  38. ! #ifdef MSDOS
  39. !   tmp_base = getenv ("TMP");
  40.     if (tmp_base == 0)
  41.       tmp_base = "";
  42.     strlwr (infile);
  43. ! #endif /* MSDOS */
  44.   
  45.     tmp_len = strlen (tmp_base);
  46.   
  47. --- 119,131 ----
  48.   #endif
  49.     int tmp_len;
  50.   
  51. ! #if defined(MSDOS) || defined(atarist)
  52. !   tmp_base = getenv ("TEMP");
  53. !   if(tmp_base == 0) tmp_base = getenv("TMP");
  54.     if (tmp_base == 0)
  55.       tmp_base = "";
  56.     strlwr (infile);
  57. ! #endif /* MSDOS || atarist */
  58.   
  59.     tmp_len = strlen (tmp_base);
  60.   
  61. ***************
  62. *** 130,138 ****
  63.         /* -o was specified.  The precise -o name will be used for ftable.
  64.        For other output files, remove the ".c" or ".tab.c" suffix.  */
  65.         name_base = spec_outfile;
  66. ! #ifdef MSDOS
  67.         strlwr (name_base);
  68. ! #endif /* MSDOS */
  69.         /* BASE_LENGTH includes ".tab" but not ".c".  */
  70.         base_length = strlen (name_base);
  71.         if (!strcmp (name_base + base_length - 2, ".c"))
  72. --- 134,142 ----
  73.         /* -o was specified.  The precise -o name will be used for ftable.
  74.        For other output files, remove the ".c" or ".tab.c" suffix.  */
  75.         name_base = spec_outfile;
  76. ! #if defined(MSDOS) || defined(atarist)
  77.         strlwr (name_base);
  78. ! #endif /* MSDOS || atarist */
  79.         /* BASE_LENGTH includes ".tab" but not ".c".  */
  80.         base_length = strlen (name_base);
  81.         if (!strcmp (name_base + base_length - 2, ".c"))
  82. ***************
  83. *** 159,165 ****
  84.   #else
  85.         strcat (name_base, ".tab");
  86.   #endif
  87. ! #ifdef MSDOS
  88.         strlwr (name_base);
  89.   #endif /* MSDOS */
  90.       }
  91. --- 163,169 ----
  92.   #else
  93.         strcat (name_base, ".tab");
  94.   #endif
  95. ! #if defined(MSDOS) || defined(atarist)
  96.         strlwr (name_base);
  97.   #endif /* MSDOS */
  98.       }
  99. ***************
  100. *** 180,190 ****
  101.   #ifdef VMS
  102.         name_base = stringappend(name_base, short_base_length, "_tab");
  103.   #else
  104. ! #ifdef MSDOS
  105.         name_base = stringappend(name_base, short_base_length, "_tab");
  106.   #else
  107.         name_base = stringappend(name_base, short_base_length, ".tab");
  108. ! #endif /* not MSDOS */
  109.   #endif
  110.         base_length = short_base_length + 4;
  111.       }
  112. --- 184,194 ----
  113.   #ifdef VMS
  114.         name_base = stringappend(name_base, short_base_length, "_tab");
  115.   #else
  116. ! #if defined(MSDOS) || defined(atarist)
  117.         name_base = stringappend(name_base, short_base_length, "_tab");
  118.   #else
  119.         name_base = stringappend(name_base, short_base_length, ".tab");
  120. ! #endif /* not MSDOS || atarist */
  121.   #endif
  122.         base_length = short_base_length + 4;
  123.       }
  124. ***************
  125. *** 192,200 ****
  126.     finput = tryopen(infile, "r");
  127.   
  128.     filename = getenv("BISON_SIMPLE");
  129. ! #ifdef MSDOS
  130.     /* File doesn't exist in current directory; try in INIT directory.  */
  131.     cp = getenv("INIT");
  132.     if (filename == 0 && cp != 0)
  133.       {
  134.         filename = malloc(strlen(cp) + strlen(PFILE) + 2);
  135. --- 196,208 ----
  136.     finput = tryopen(infile, "r");
  137.   
  138.     filename = getenv("BISON_SIMPLE");
  139. ! #if defined(MSDOS) || defined(atarist)
  140.     /* File doesn't exist in current directory; try in INIT directory.  */
  141. + #ifdef atarist
  142. +   cp = getenv("GNULIB");
  143. + #else
  144.     cp = getenv("INIT");
  145. + #endif
  146.     if (filename == 0 && cp != 0)
  147.       {
  148.         filename = malloc(strlen(cp) + strlen(PFILE) + 2);
  149. ***************
  150. *** 208,214 ****
  151.   
  152.     if (verboseflag)
  153.       {
  154. ! #ifdef MSDOS
  155.         outfile = stringappend(name_base, short_base_length, ".out");
  156.   #else
  157.         if (spec_name_prefix)
  158. --- 216,222 ----
  159.   
  160.     if (verboseflag)
  161.       {
  162. ! #if defined(MSDOS) || defined(atarist)
  163.         outfile = stringappend(name_base, short_base_length, ".out");
  164.   #else
  165.         if (spec_name_prefix)
  166. ***************
  167. *** 219,225 ****
  168.         foutput = tryopen(outfile, "w");
  169.       }
  170.   
  171. ! #ifdef MSDOS
  172.     actfile = mktemp(stringappend(tmp_base, tmp_len, "acXXXXXX"));
  173.     tmpattrsfile = mktemp(stringappend(tmp_base, tmp_len, "atXXXXXX"));
  174.     tmptabfile = mktemp(stringappend(tmp_base, tmp_len, "taXXXXXX"));
  175. --- 227,233 ----
  176.         foutput = tryopen(outfile, "w");
  177.       }
  178.   
  179. ! #if defined(MSDOS) || defined(atarist)
  180.     actfile = mktemp(stringappend(tmp_base, tmp_len, "acXXXXXX"));
  181.     tmpattrsfile = mktemp(stringappend(tmp_base, tmp_len, "atXXXXXX"));
  182.     tmptabfile = mktemp(stringappend(tmp_base, tmp_len, "taXXXXXX"));
  183. ***************
  184. *** 241,247 ****
  185.         fdefines = tryopen(tmpdefsfile, "w+");
  186.       }
  187.   
  188. ! #ifndef MSDOS
  189.     unlink(actfile);
  190.     unlink(tmpattrsfile);
  191.     unlink(tmptabfile);
  192. --- 249,255 ----
  193.         fdefines = tryopen(tmpdefsfile, "w+");
  194.       }
  195.   
  196. ! #if !(defined(MSDOS) || defined(atarist))
  197.     unlink(actfile);
  198.     unlink(tmpattrsfile);
  199.     unlink(tmptabfile);
  200. ***************
  201. *** 258,264 ****
  202.     attrsfile = stringappend(name_base, short_base_length, "_stype.h");
  203.     guardfile = stringappend(name_base, short_base_length, "_guard.c");
  204.   #else
  205. ! #ifdef MSDOS
  206.     attrsfile = stringappend(name_base, short_base_length, ".sth");
  207.     guardfile = stringappend(name_base, short_base_length, ".guc");
  208.   #else
  209. --- 266,272 ----
  210.     attrsfile = stringappend(name_base, short_base_length, "_stype.h");
  211.     guardfile = stringappend(name_base, short_base_length, "_guard.c");
  212.   #else
  213. ! #if defined(MSDOS) || defined(atarist)
  214.     attrsfile = stringappend(name_base, short_base_length, ".sth");
  215.     guardfile = stringappend(name_base, short_base_length, ".guc");
  216.   #else
  217. ***************
  218. *** 283,291 ****
  219.     fclose(fparser);
  220.   
  221.     filename = (char *) getenv ("BISON_HAIRY");
  222. ! #ifdef MSDOS
  223.     /* File doesn't exist in current directory; try in INIT directory.  */
  224.     cp = getenv("INIT");
  225.     if (filename == 0 && cp != 0)
  226.       {
  227.         filename = malloc(strlen(cp) + strlen(PFILE1) + 2);
  228. --- 291,303 ----
  229.     fclose(fparser);
  230.   
  231.     filename = (char *) getenv ("BISON_HAIRY");
  232. ! #if defined(MSDOS) || defined(atarist)
  233.     /* File doesn't exist in current directory; try in INIT directory.  */
  234. + #ifdef atarist
  235. +   cp = getenv("GNULIB");
  236. + #else
  237.     cp = getenv("INIT");
  238. + #endif
  239.     if (filename == 0 && cp != 0)
  240.       {
  241.         filename = malloc(strlen(cp) + strlen(PFILE1) + 2);
  242. ***************
  243. *** 385,391 ****
  244.     if (k==0) sys$exit(SS$_NORMAL);
  245.     sys$exit(SS$_ABORT);
  246.   #else
  247. ! #ifdef MSDOS
  248.     if (actfile) unlink(actfile);
  249.     if (tmpattrsfile) unlink(tmpattrsfile);
  250.     if (tmptabfile) unlink(tmptabfile);
  251. --- 397,403 ----
  252.     if (k==0) sys$exit(SS$_NORMAL);
  253.     sys$exit(SS$_ABORT);
  254.   #else
  255. ! #if defined(MSDOS) || defined(atarist)
  256.     if (actfile) unlink(actfile);
  257.     if (tmpattrsfile) unlink(tmpattrsfile);
  258.     if (tmptabfile) unlink(tmptabfile);
  259. *** reader.c.orig    Wed Sep 30 15:34:01 1992
  260. --- reader.c    Wed Sep 30 15:34:30 1992
  261. ***************
  262. *** 52,58 ****
  263.   extern int expected_conflicts;
  264.   extern char *token_buffer;
  265.   
  266. ! #ifndef MSDOS
  267.   extern char *realloc ();
  268.   #endif
  269.   
  270. --- 52,58 ----
  271.   extern int expected_conflicts;
  272.   extern char *token_buffer;
  273.   
  274. ! #if !(defined(MSDOS) || defined(atarist))
  275.   extern char *realloc ();
  276.   #endif
  277.   
  278. *** system.h.orig    Wed Sep 30 15:34:01 1992
  279. --- system.h    Wed Sep 30 15:34:30 1992
  280. ***************
  281. *** 1,3 ****
  282. --- 1,10 ----
  283. + #ifdef atarist
  284. + #include <stdlib.h>
  285. + #include <unistd.h>
  286. + #include <memory.h>
  287. + #include <string.h>
  288. + #endif
  289. + 
  290.   #ifdef MSDOS
  291.   #include <stdlib.h>
  292.   #include <io.h>
  293.